home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 July / CMCD0703.ISO / Software / Freeware / Grafica / ethumb / Setup.exe / {app} / EzThumbs.exe / 0 / RCDATA / TFRMIMAGEPREVIEW / TFRMIMAGEPREVIEW.txt < prev   
Encoding:
Text File  |  2003-05-07  |  1.9 KB  |  81 lines
  1. object frmImagePreview: TfrmImagePreview
  2.   Left = 364
  3.   Top = 102
  4.   HorzScrollBar.Visible = False
  5.   VertScrollBar.Visible = False
  6.   AutoScroll = False
  7.   BorderIcons = [biSystemMenu]
  8.   Caption = 'Preview'
  9.   ClientHeight = 150
  10.   ClientWidth = 150
  11.   Color = clBtnFace
  12.   Constraints.MinHeight = 100
  13.   Constraints.MinWidth = 100
  14.   DefaultMonitor = dmDesktop
  15.   Font.Charset = DEFAULT_CHARSET
  16.   Font.Color = clWindowText
  17.   Font.Height = -11
  18.   Font.Name = 'MS Sans Serif'
  19.   Font.Style = []
  20.   FormStyle = fsStayOnTop
  21.   Icon.Data = {<image000.ico>}
  22.   OldCreateOrder = False
  23.   Scaled = False
  24.   OnClose = FormClose
  25.   OnResize = FormResize
  26.   PixelsPerInch = 96
  27.   TextHeight = 13
  28.   object imgPreview: TEfImageEnView
  29.     Left = 0
  30.     Top = 0
  31.     Width = 150
  32.     Height = 150
  33.     Cursor = crDefault
  34.     Hint = 
  35.       'Double-click to increase size limit, double-click+Shift to reduc' +
  36.       'e size limit'
  37.     ParentCtl3D = False
  38.     ScrollBars = ssNone
  39.     Center = True
  40.     AutoFit = True
  41.     Align = alClient
  42.     PopupMenu = pmnImage
  43.     TabOrder = 0
  44.     OnDblClick = imgPreviewDblClick
  45.     ScaleToFit = True
  46.   end
  47.   object pmnImage: TPopupMenu
  48.     OnChange = pmnImageChange
  49.     Left = 32
  50.     Top = 48
  51.     object smnFullSize: TMenuItem
  52.       Caption = '&Full Size'
  53.       Hint = 'Check this menu item to show image at full size'
  54.       OnClick = smnFullSizeClick
  55.     end
  56.     object smnZoomIn: TMenuItem
  57.       Caption = 'Zoom &In'
  58.       Hint = 'Increase the size of the picture'
  59.       OnClick = smnZoomInClick
  60.     end
  61.     object smnZoomOut: TMenuItem
  62.       Caption = 'Zoom &Out'
  63.       Hint = 'Decrease the size of the picture'
  64.       OnClick = smnZoomOutClick
  65.     end
  66.     object N1: TMenuItem
  67.       Caption = '-'
  68.     end
  69.     object Reload1: TMenuItem
  70.       Caption = '&Reload'
  71.       OnClick = Reload1Click
  72.     end
  73.   end
  74.   object vclTimer: TEfTimer
  75.     StopAfterDelay = False
  76.     OnDelayOver = vclTimerDelayOver
  77.     Left = 64
  78.     Top = 48
  79.   end
  80. end
  81.